home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Programming / powerd / lib / chunky.lha / chunky / PutPixel32.ass < prev    next >
Encoding:
Text File  |  1980-12-04  |  412 b   |  28 lines
  1.  
  2. ; PutPixel32(chunky:a0:PTR TO chunky,x:d0:LONG,y:d1:LONG,colour:d2:LONG)(LONG)
  3.  
  4.     machine    mc68020
  5.     fpu    1
  6.  
  7.     xdef    _PutPixel32
  8.  
  9. _PutPixel32
  10.     cmpa.l    #0,a0
  11.     beq.s    .finish
  12.     tst.l    d0
  13.     blt.s    .finish
  14.     tst.l    d1
  15.     blt.s    .finish
  16.     cmp.l    (a0),d0
  17.     bge.s    .finish
  18.     cmp.l    (4,a0),d1
  19.     bge.s    .finish
  20.  
  21.     muls.l    (a0),d1
  22.     add.l    d0,d1
  23.     lsl.l    #2,d1        ; d1 now contains position in buffer
  24.     movea.l    (8,a0),a1
  25.     move.l    d2,(a1,d1.l)
  26.  
  27. .finish    rts
  28.